500
|
Is it possible to prevent closing the control's filter bar, so it is always shown

OBJECT column,combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Item") , "DisplayFilterButton", -1);
column = _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Pos");
_ObjectSetProperty( column , "AllowSizing", 0);
_ObjectSetProperty( column , "AllowSort", 0);
_ObjectSetProperty( column , "Width", 32);
_ObjectSetProperty( column , "FormatColumn", "1 apos ``");
_ObjectSetProperty( column , "Position", 0);
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod( items , "AddItem", "Item A");
_ObjectCallMethod( items , "AddItem", "Item B");
_ObjectCallMethod( items , "AddItem", "Item C");
_ObjectSetProperty( combobox , "FilterBarCaption", "len(value) = 0 ? `<fgcolor=808080>no filter` : value");
_ObjectSetProperty( combobox , "FilterBarPromptVisible", 2);
column = _ObjectCallMethod(combobox, "ExecuteTemplate", "Columns.Item(0)");
_ObjectSetProperty( column , "FilterType", 240);
_ObjectSetProperty( column , "Filter", "Item B");
_ObjectCallMethod( combobox , "ApplyFilter");
_ObjectCallMethod( combobox , "EndUpdate");
|
499
|
How can I change the visual appearance of the +/- buttons, open/close glyphs as current visual theme (method 3)

OBJECT appearance,combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
appearance = _ObjectGetProperty( combobox , "VisualAppearance");
_ObjectCallMethod( appearance , "Add", 3,"gBFLBCJwBAEHhEJAAEhABDwCg6AADACAxRDgMQBQKAAzAJBIYhiG4cYCgMZhXDOCYXABCEYRXBIZQ7BKNIxjSJ5BhIAAyDSJMjSRJUEhqGCWYDleYYYAKHIMQLJQKQS" +
"BcQR9EaBZBAWTpQC0OJDTJRI4TNAgbSYAAYRqoCb6loTKypaxjCQQIgkUBpGKdBynEYsDwSGyJCCJWyIbpKAwoVbcs4AYhuJpaQi+d5PFbjVT8dLAMBwLA8EwXAJ+Opf" +
"DxXU7eFKpR5fchXTI8UxXFqXZhkeQrfh7KYVRBKdBQRBEFQPJqnahqOpaXo2RoLUJKcQwHTmHYNQTALyuTALZrWeZ3XrgN74LbtZzVQauYRpbCMEr6bpoWLnFi6Ho1U4" +
"llWah1jqSweFqfxPgQQRphi+Yak0YIuqUfJegef4zluaJ3nqPJeCYH4BAeX5TDLBpVGqKRRnwf4flefZtHsX54BYAR/F+EwVnUd5eAMMJKDIChygyIQpAoEh4iIJ5Jlg" +
"XIcgCXpIGoFwnGEQh6BEKBgmMIICHgIJCAiUAzgyUoAhwJohkiRgygwYpiGoKwzGIcgKCkNQNCMRIbCYCRYk4QoMiOchWDwNBjhiJJaDYTRiGiFwlCQAhOE8JBJHITIR" +
"gwZRZFCFCZBkOIUhKTRpCWAwgGYQ4El4NxlBifIWCcCYCFoaoMGaKYyG6GxlBmGJdhkCAWBIeA5g4U4QhMJAImkPIShRVxGgQJRlCIUISh+SJpnCZIeBgFgiHgO4OlOM" +
"INCISByECDQikkGhuh2JwpmqBogCKaYiC6FwhmkQ4yHgYgYiaHopiuaRakCbIsisSpGjYOwaHYKYMCkK5CA2IxrCwCwFigaJrkLTI6lcdANAEgIA=");
_ObjectCallMethod( appearance , "Add", 1,"CP:3 -2 -2 2 2");
_ObjectCallMethod( appearance , "Add", 4,"gBFLBCJwBAEHhEJAAEhABEICg6AADACAxRDgMQBQKAAzAJBIYhiG4cYCgMZhXDOCYXABCEYRXBIZQ7BKNIxjSJ5BhIAAyDSJMjSRJUEhqGCWYDleYYYAKHIMQLJQKQS" +
"BcQR9EaBZBAWTpQC0OJDTJRI4TNAgbSYAAYRqoCb6loTKypaxjCQQIgkUBpGKdBynEYsDwSGyJCCJWyIbpKAwoVbcs4AYhuJpaQi+d5PFbjVT8dLAMBwLA8EwXAJ+Opf" +
"DxXU7eFKpR5fchXTI8UxXFqXZhkeQrfh7KYVRBKdBQRBEFQPJqnahqOpaXo2RoLUJKcQwHTmHYNQTALyuTALZrWeZ3XrgN74LbtZzVQauYRpbCMEr6bpoWLnFi6Ho1U4" +
"llWah1jqSweFqfxPgQQRphi+Yak0YIuqUfJeg8X4rluaZ3niGB+AQHx/EyShjjEVYqiUR5rnmex/GAB5+AIf4gEeXJFHyXZ3gCTAygyAociMKBKEKBIeCiCZyHYFAnCE" +
"eBkh+BghFgRIegOCgYCySAgh4CAkgINAMmMNIgCcCYjn4LoLmMCJGDKC5ijIagoDMYhCAoJg1A0IxEhsJgJFiThChCY5yFYPA0GOGIYloNhNGIaIXCUJACE4TwkEkchO" +
"FSFYlFkXhUCUCQZEYTglCSMxaEkYJIBmFJhDeDZZEYPwlgmQhghaGqVDoa4bGaeY6FGGZNlmFIBGEJ4jhiZQ5AkMhAg6E5JCkRoGCUSQ6B6CYiSCBIOh+DhJmmARiWQO" +
"JtDsCJSCSBwkXSLIRicaZ6HqIIomoIguhwIpphIHoWDsJ4mCGChpmqOpGheLIOkqUo2iya4DjGJxihiQoSj4IJaDaMpCjCWoGg6PgpBiQ4tHcQJQBAgI=");
_ObjectCallMethod( appearance , "Add", 2,"CP:4 -2 -2 2 2");
_ObjectSetProperty( combobox , "LinesAtRoot", 1);
_ObjectSetProperty( combobox , "HasButtons", 4);
_ObjectCallMethod(combobox, "ExecuteTemplate", "HasButtonsCustom(0) = 16777216");
_ObjectCallMethod(combobox, "ExecuteTemplate", "HasButtonsCustom(1) = 33554432");
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Column");
items = _ObjectGetProperty( combobox , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
h = _ObjectCallMethod( items , "AddItem", "Root 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child");
_ObjectCallMethod( combobox , "EndUpdate");
|
498
|
How can I change the visual appearance of the +/- buttons, open/close glyphs as current visual theme (method 2)

OBJECT appearance,combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
appearance = _ObjectGetProperty( combobox , "VisualAppearance");
_ObjectCallMethod( appearance , "Add", 1,"XP:TREEVIEW 2 1");
_ObjectCallMethod( appearance , "Add", 2,"XP:TREEVIEW 2 2");
_ObjectCallMethod(combobox, "ExecuteTemplate", "Background(180) = 16777216");
_ObjectCallMethod(combobox, "ExecuteTemplate", "Background(181) = 33554432");
_ObjectSetProperty( combobox , "LinesAtRoot", -1);
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Column");
items = _ObjectGetProperty( combobox , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
h = _ObjectCallMethod( items , "AddItem", "Root 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child");
_ObjectCallMethod( combobox , "EndUpdate");
|
497
|
How can I find if the control is running in DPI mode
OBJECT combobox;
combobox = ObjectByName("AN1") ;
Message( _ObjectCallMethod( combobox , "FormatABC", "dpi = 1 ? `normal/stretch mode` : `dpi mode`") );
|
496
|
How can I change the visual appearance of the +/- buttons (method 1)

OBJECT appearance,combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
appearance = _ObjectGetProperty( combobox , "VisualAppearance");
_ObjectCallMethod( appearance , "Add", 1,"gBFLBCJwBAEHhEJAAEhABDwCg6AADACAxRDgMQBQKAAzAJBIYhiG4cYCgMZhXDOCYXABCEYRXBIZQ7BKNIxjSJ5BhIAAyDSJMjSRJUEhqGCWYDleYYYAKHIMQLJQKQS" +
"BcQR9EaBZBAWTpQC0OJDTJRI4TNAgbSYAAYRqoCb6loTKypaxjCQQIgkUBpGKdBynEYsDwSGyJCCJWyIbpKAwoVbcs4AYhuJpaQi+d5PFbjVT8dLAMBwLA8EwXAJ+Opf" +
"DxXU7eFKpR5fchXTI8UxXFqXZhkeQrfh7KYVRBKdBQRBEFQPJqnahqOpaXo2RoLUJKcQwHTmHYNQTALyuTALZrWeZ3XrgN74LbtZzVQauYRpbCMEr6bpoWLnFi6Ho1U4" +
"llWah1jqSweFqfxPgQQRphi+Yak0YIuqUfJegef4zluaJ3nqPJeCYH4BAeX5TDLBpVGqKRRnwf4flefZtHsX54BYAR/F+EwVnUd5eAMMJKDIChygyIQpAoEh4iIJ5Jlg" +
"XIcgCXpIGoFwnGEQh6BEKBgmMIICHgIJCAiUAzgyUoAhwJohkiRgygwYpiGoKwzGIcgKCkNQNCMRIbCYCRYk4QoMiOchWDwNBjhiJJaDYTRiGiFwlCQAhOE8JBJHITIR" +
"gwZRZFCFCZBkOIUhKTRpCWAwgGYQ4El4NxlBifIWCcCYCFoaoMGaKYyG6GxlBmGJdhkCAWBIeA5g4U4QhMJAImkPIShRVxGgQJRlCIUISh+SJpnCZIeBgFgiHgO4OlOM" +
"INCISByECDQikkGhuh2JwpmqBogCKaYiC6FwhmkQ4yHgYgYiaHopiuaRakCbIsisSpGjYOwaHYKYMCkK5CA2IxrCwCwFigaJrkLTI6lcdANAEgIA=");
_ObjectCallMethod( appearance , "Add", 2,"gBFLBCJwBAEHhEJAAEhABEICg6AADACAxRDgMQBQKAAzAJBIYhiG4cYCgMZhXDOCYXABCEYRXBIZQ7BKNIxjSJ5BhIAAyDSJMjSRJUEhqGCWYDleYYYAKHIMQLJQKQS" +
"BcQR9EaBZBAWTpQC0OJDTJRI4TNAgbSYAAYRqoCb6loTKypaxjCQQIgkUBpGKdBynEYsDwSGyJCCJWyIbpKAwoVbcs4AYhuJpaQi+d5PFbjVT8dLAMBwLA8EwXAJ+Opf" +
"DxXU7eFKpR5fchXTI8UxXFqXZhkeQrfh7KYVRBKdBQRBEFQPJqnahqOpaXo2RoLUJKcQwHTmHYNQTALyuTALZrWeZ3XrgN74LbtZzVQauYRpbCMEr6bpoWLnFi6Ho1U4" +
"llWah1jqSweFqfxPgQQRphi+Yak0YIuqUfJeg8X4rluaZ3niGB+AQHx/EyShjjEVYqiUR5rnmex/GAB5+AIf4gEeXJFHyXZ3gCTAygyAociMKBKEKBIeCiCZyHYFAnCE" +
"eBkh+BghFgRIegOCgYCySAgh4CAkgINAMmMNIgCcCYjn4LoLmMCJGDKC5ijIagoDMYhCAoJg1A0IxEhsJgJFiThChCY5yFYPA0GOGIYloNhNGIaIXCUJACE4TwkEkchO" +
"FSFYlFkXhUCUCQZEYTglCSMxaEkYJIBmFJhDeDZZEYPwlgmQhghaGqVDoa4bGaeY6FGGZNlmFIBGEJ4jhiZQ5AkMhAg6E5JCkRoGCUSQ6B6CYiSCBIOh+DhJmmARiWQO" +
"JtDsCJSCSBwkXSLIRicaZ6HqIIomoIguhwIpphIHoWDsJ4mCGChpmqOpGheLIOkqUo2iya4DjGJxihiQoSj4IJaDaMpCjCWoGg6PgpBiQ4tHcQJQBAgI=");
_ObjectSetProperty( combobox , "LinesAtRoot", -1);
_ObjectCallMethod(combobox, "ExecuteTemplate", "Background(180) = 16777216");
_ObjectCallMethod(combobox, "ExecuteTemplate", "Background(181) = 33554432");
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Column");
items = _ObjectGetProperty( combobox , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
h = _ObjectCallMethod( items , "AddItem", "Root 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child");
_ObjectCallMethod( combobox , "EndUpdate");
|
495
|
Is there a way to change the dropdown button arrow to something else ( ebn, sample 3 )

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectCallMethod( _ObjectGetProperty( combobox , "VisualAppearance") , "Add", 1,"gBFLBCJwBAEHhEJAAEhABZEGACAADACAxRDgMQBQKAAzAJBIYhkGYYYCgMZRUDGCYXABCEYRXBIZQ7BKNIxjSJwFgmEgADKMA4SOKIZhrE4bBhGaQRUgyI43RhHUBzV" +
"IUcQvE6TZRHCQYHgkNIhDJIM7TPLkeSVJaTIRoKhJUogApQThTMgVRDEThkGoSa6soSoYTDBKybLrSLKagOT5YUDKUqSdKEZRpEq1YztWbaQoCUoqVRRVIWfbNd4JJa4" +
"aDhWpYdpeeY5R7bWLgBYVVABL7LLRsSxpHxPF6RXxaeI3GKsaS8G6ic6nPQMHj7I4NS5pUa6Rh2VYNSa8AAtETRYznOw4bTMXAjNIea5bAYIIR5HIoDzVbQcCQAHL9DB" +
"eEMIQEEISgGhMGZQmocgymoYRRCIEQ0G2HYBnEIBig4V4zCQGINnmagCECY43medZ6H2Pw/g+X5fnueh/h+R5+AKABfkMWgGgGYA4AICoCGCE5WA4CphACMgSD2IRIDI" +
"BICmEd5YGCBpRjGBgegWIYIgWdgoGIRQsiKCZiAiJZ0gGQI4jUS4LECOAiBmDJflGfg2BSY4Al4OhGkOCJ2DgFJjGGfgqgiH5Ch4RhGkqOQmEOEpkFkHQYhJRYyESAok" +
"GKHhIhKIxJEmf4VGUeRGFmF5iBkchPhYJQ5GoYIZg6Ug6GoFYmkmNhuhuZwJkYcoagiZ5+HQFRngmZh6h6Z5JnYfodCaCgGBcOpfBQBCAgA==");
_ObjectCallMethod(combobox, "ExecuteTemplate", "Background(4) = 16777216");
_ObjectCallMethod(combobox, "ExecuteTemplate", "Background(5) = 32567536");
_ObjectSetProperty( combobox , "LinesAtRoot", -1);
_ObjectSetProperty( combobox , "Style", 2);
_ObjectSetProperty( combobox , "IntegralHeight", -1);
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "P1");
items = _ObjectGetProperty( combobox , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.SelectItem(h) = True");
_ObjectCallMethod( combobox , "EndUpdate");
|
494
|
Is there a way to change the dropdown button arrow to something else ( ebn, sample 2 )

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectCallMethod( _ObjectGetProperty( combobox , "VisualAppearance") , "Add", 1,"gBFLBCJwBAEHhEJAAEhABKgCg6AADACAxRDgMQBQKAAzAJBIYhkGYYYCgMZRUDGCYXABCEYRXBIZQ7BKNIxjSJwFgmEgADKMA4SOKIZhrE4bBhGaQRUgyI43RhHUBzV" +
"IUcQvE6TZRHCQYHgkNIhDJIM7TPLkeSVJaTIRoKhJUogApQThTMgVRDEThkGoSa6soSoYTDBKybLrSLKagOT5YUDKUqSdKEZRpEq1YztWbaQoCUoqVRRVIWfbNd4JJa4" +
"aDhWpYdpeeY5R7bWLgBYVVABL7LLRsSxpHxPF6RXxaeI3GKsaS8G6ic6nPQMHj7I4NS5pUa6Rh2VYNSa8AAtETRYznOw4bTMXAjNIea5bAYIIR5HIoDzVbQcCQAHL9DB" +
"eEMIQEEISgGhMGZQmocgymoYRRCIEQ0G2HYBnEIBig4V4zCQGINnmagCECY43medZ6H2Pw/EeH5wiITwUkWMRsF4PYgEeaZ3gGYBoCWeICk6V5wnMf4FDCAAfAiYQgg4" +
"AYAmAWC7gIIYnm2fR/mEUYAF4GIFFEVBYgUYR4BCdoGmKSB6A+CAhDGBBfBiT4IlSdQ9A8WIWCeBJihgZgcg+YJoEIFYMiMSJWAaDZjhiGgogCIooG4QYMAIOQSDUPgi" +
"lONhIg6JI4GIK4LiQKJGDOFJgGMbJbDcDg5hYR4OCWCJyEyAQiCGChDheZBoDIYg3AMIJEVYQ4AnoZQ4mYeQmDsCJGmGNBwDQTQDEaAQcCYCZKGOHRDHgVgVh4J4phoD" +
"ISAaEYkGsNhNhMahVhyaJIFSDiuAIBIBCCaJ5mYe4VGGOhyHaBRInIPIRH2D5qkaIopCEOhCieBxjnqKoNgSapaj6OIsE+apOiWJBnkqYo6isKpqiGdIwCwKpWiaJIOl" +
"sHo8jIa4JFaTIomwOZuBeMgrmifpKgGbR6lAI4lEaM4ymYKIKCKEpfjqbI6kSHgnEmc5GnIOpfBQBCAg=");
_ObjectCallMethod(combobox, "ExecuteTemplate", "Background(4) = 16777216");
_ObjectCallMethod(combobox, "ExecuteTemplate", "Background(5) = 25198720");
_ObjectSetProperty( combobox , "LinesAtRoot", -1);
_ObjectSetProperty( combobox , "Style", 2);
_ObjectSetProperty( combobox , "IntegralHeight", -1);
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "P1");
items = _ObjectGetProperty( combobox , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.SelectItem(h) = True");
_ObjectCallMethod( combobox , "EndUpdate");
|
493
|
Is there a way to change the dropdown button arrow to something else ( ebn, sample 1 )

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectCallMethod( _ObjectGetProperty( combobox , "VisualAppearance") , "Add", 1,"gBFLBCJwBAEHhEJAAEhABFACg6AADACAxRDgMQBQKAAzAJBIYhkGYYYCgMZRUDGCYXABCEYRXBIZQ7BKNIxjSJwFgmEgADKMA4SOKIZhrE4bBhGaQRUgyI43RhHUBzV" +
"IUcQvE6TZRHCQYHgkNIhDJIM7TPLkeSVJaTIRoKhJUogApQThTMgVRDEThkGoSa6soSoYTDBKybLrSLKagOT5YUDKUqSdKEZRpEq1YztWbaQoCUoqVRRVIWfbNd4JJa4" +
"aDhWpYdpeeY5R7bWLgBYVVABL7LLRsSxpHxPF6RXxaeI3GKsaS8G6ic6nPQMHj7I4NS5pUa6Rh2VYNSa8AAtETRYznOw4bTMXAjNIea5bAYIIR5HIoDzVbQcCQAHL9DB" +
"eEMIQEEISgGhMGZQmocgymoYRRCIEQ0G2HYBnEIBig4V4zCQGINnmagCECY43medZ6H2Pw/g+X5dlqIh/k8SAFnofxgDgFZ8gGH5ShYCgmiCQgeA6AghAgr5/EyWBUhC" +
"BZPngZIvgaSpoHYEYBCEOAMnWCJGgiFgZgmYoIDiBw1iKSB+C4fQHhiRJjgyYoIlYJwXmOA56DqC5iAONIhg+S45AYNoQmGExqEYIJkgicZ2gsDRhG4ToSAgMZqFIOol" +
"EiHJzhWSIJGYUAZiWSBsi+EofEkGhiDaCIphSPIZmIcp2GoI4mkmDhGD4JwJgIPQkmcQwqHaCZKgmZI0h6ZwonCFIfmYKIch6IJMhoFh9ggXxIgydQZmjTR5iORhKEaB" +
"4PGAOgUkmD5KBiHItiaSwKHaE4CPuBoMVieJMmMH4qgofoIDsRx6jSZorksapGGUIoqiidJHi2RYKmSHIumEchAh2L5rFeWhUDqAxbBQSIxkeCwkjGMpOAsNpBH0Do3k" +
"UASAg");
_ObjectCallMethod(combobox, "ExecuteTemplate", "Background(4) = 16777216");
_ObjectCallMethod(combobox, "ExecuteTemplate", "Background(5) = 25198720");
_ObjectSetProperty( combobox , "LinesAtRoot", -1);
_ObjectSetProperty( combobox , "Style", 2);
_ObjectSetProperty( combobox , "IntegralHeight", -1);
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "P1");
items = _ObjectGetProperty( combobox , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.SelectItem(h) = True");
_ObjectCallMethod( combobox , "EndUpdate");
|
492
|
Is there a way to change the dropdown button arrow to something else ( theme, ebn )

OBJECT appearance,combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
appearance = _ObjectGetProperty( combobox , "VisualAppearance");
_ObjectCallMethod( appearance , "Add", 1,"XP:SCROLLBAR 1 6");
_ObjectCallMethod( appearance , "Add", 2,"XP:SCROLLBAR 1 7");
_ObjectCallMethod(combobox, "ExecuteTemplate", "Background(4) = 16777216");
_ObjectCallMethod(combobox, "ExecuteTemplate", "Background(5) = 33554432");
_ObjectSetProperty( combobox , "LinesAtRoot", -1);
_ObjectSetProperty( combobox , "Style", 2);
_ObjectSetProperty( combobox , "IntegralHeight", -1);
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "P1");
items = _ObjectGetProperty( combobox , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.SelectItem(h) = True");
_ObjectCallMethod( combobox , "EndUpdate");
|
491
|
Is there a way to change the dropdown button arrow to something else ( no visual theme )

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "UseVisualTheme", 1099);
_ObjectSetProperty( combobox , "LinesAtRoot", -1);
_ObjectSetProperty( combobox , "Style", 2);
_ObjectSetProperty( combobox , "IntegralHeight", -1);
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "P1");
items = _ObjectGetProperty( combobox , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.SelectItem(h) = True");
_ObjectCallMethod( combobox , "EndUpdate");
|
490
|
Is there a way to change the dropdown button arrow to something else ( solid color )

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectCallMethod(combobox, "ExecuteTemplate", "Background(5) = 12500670");
_ObjectCallMethod(combobox, "ExecuteTemplate", "Background(4) = 8421504");
_ObjectSetProperty( combobox , "LinesAtRoot", -1);
_ObjectSetProperty( combobox , "Style", 2);
_ObjectSetProperty( combobox , "IntegralHeight", -1);
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "P1");
items = _ObjectGetProperty( combobox , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.SelectItem(h) = True");
_ObjectCallMethod( combobox , "EndUpdate");
|
489
|
How can I find if there is any filter applied to the control

// FilterChange event - Occurs when filter was changed.
FUNCTION comboboxEvents_FilterChange()
Message( "If negative, the filter is present, else not" );
Message( _ObjectGetProperty( _ObjectGetProperty( combobox , "Items") , "VisibleItemCount") );
END
OBJECT column,combobox,items;
combobox = ObjectByName("AN1") ;
ObjectAssociateEvents("comboboxEvents", combobox);
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "LinesAtRoot", -1);
_ObjectSetProperty( combobox , "TreeColumnIndex", -1);
_ObjectSetProperty( combobox , "FilterInclude", 4);
column = _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Column");
_ObjectSetProperty( column , "DisplayFilterButton", -1);
_ObjectSetProperty( column , "FilterType", 240);
_ObjectSetProperty( column , "Filter", "C1");
items = _ObjectGetProperty( combobox , "Items");
h = _ObjectCallMethod( items , "AddItem", "R1");
_ObjectCallMethod( items , "InsertItem", h,"","C1");
_ObjectCallMethod( items , "InsertItem", h,"","C2");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
h = _ObjectCallMethod( items , "AddItem", "R2");
_ObjectCallMethod( items , "InsertItem", h,"","C1");
_ObjectCallMethod( items , "InsertItem", h,"","C2");
_ObjectCallMethod( combobox , "ApplyFilter");
_ObjectCallMethod( combobox , "EndUpdate");
|
488
|
How can I prevent showing the lines for the hierarchy while using the exMatchingItemsOnly option

OBJECT column,combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "LinesAtRoot", -1);
_ObjectSetProperty( combobox , "TreeColumnIndex", -1);
_ObjectSetProperty( combobox , "FilterInclude", 4);
column = _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Column");
_ObjectSetProperty( column , "DisplayFilterButton", -1);
_ObjectSetProperty( column , "FilterType", 240);
_ObjectSetProperty( column , "Filter", "C1|C2");
items = _ObjectGetProperty( combobox , "Items");
h = _ObjectCallMethod( items , "AddItem", "R1");
_ObjectCallMethod( items , "InsertItem", h,"","C1");
_ObjectCallMethod( items , "InsertItem", h,"","C2");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
h = _ObjectCallMethod( items , "AddItem", "R2");
_ObjectCallMethod( items , "InsertItem", h,"","C1");
_ObjectCallMethod( items , "InsertItem", h,"","C2");
_ObjectCallMethod( combobox , "ApplyFilter");
_ObjectCallMethod( combobox , "EndUpdate");
|
487
|
Is there any method to get only the matched items and not the items with his parent

OBJECT column,combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "LinesAtRoot", -1);
_ObjectSetProperty( combobox , "FilterInclude", 4);
column = _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Column");
_ObjectSetProperty( column , "DisplayFilterButton", -1);
_ObjectSetProperty( column , "FilterType", 240);
_ObjectSetProperty( column , "Filter", "C1|C2");
items = _ObjectGetProperty( combobox , "Items");
h = _ObjectCallMethod( items , "AddItem", "R1");
_ObjectCallMethod( items , "InsertItem", h,"","C1");
_ObjectCallMethod( items , "InsertItem", h,"","C2");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
h = _ObjectCallMethod( items , "AddItem", "R2");
_ObjectCallMethod( items , "InsertItem", h,"","C1");
_ObjectCallMethod( items , "InsertItem", h,"","C2");
_ObjectCallMethod( combobox , "ApplyFilter");
_ObjectCallMethod( combobox , "EndUpdate");
|
486
|
How do I get sorted the column as string, numeric, date, date and time. Also how can it be applied to drop down filter panel

OBJECT column,combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
column = _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Date");
_ObjectSetProperty( column , "SortType", 2);
_ObjectSetProperty( column , "DisplayFilterButton", -1);
_ObjectSetProperty( column , "DisplayFilterPattern", 0);
_ObjectSetProperty( column , "DisplayFilterDate", -1);
_ObjectSetProperty( column , "FilterList", 1296);
column = _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "DateTime");
_ObjectSetProperty( column , "SortType", 3);
_ObjectSetProperty( column , "DisplayFilterButton", -1);
_ObjectSetProperty( column , "DisplayFilterPattern", 0);
_ObjectSetProperty( column , "FilterList", 1296);
column = _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Time");
_ObjectSetProperty( column , "SortType", 4);
_ObjectSetProperty( column , "DisplayFilterButton", -1);
_ObjectSetProperty( column , "DisplayFilterPattern", 0);
_ObjectSetProperty( column , "FilterList", 1296);
_ObjectSetProperty( column , "FormatColumn", "time(value)");
column = _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Numeric");
_ObjectSetProperty( column , "SortType", 1);
_ObjectSetProperty( column , "DisplayFilterButton", -1);
_ObjectSetProperty( column , "FilterList", 1296);
column = _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "String");
_ObjectSetProperty( column , "DisplayFilterButton", -1);
_ObjectSetProperty( column , "FilterList", 1296);
items = _ObjectGetProperty( combobox , "Items");
h = _ObjectCallMethod( items , "AddItem", "1/27/2010");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(h,1) = #1/27/2010 10:00:00 AM#");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(h,2) = CellCaption(h,1)");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(h,3) = 1");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(h,4) = CellCaption(h,3)");
h = _ObjectCallMethod( items , "AddItem", "1/27/2011");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(h,1) = #1/27/2011 9:00:00 AM#");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(h,2) = CellCaption(h,1)");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(h,3) = 11");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(h,4) = CellCaption(h,3)");
h = _ObjectCallMethod( items , "AddItem", "11/2/2010");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(h,1) = #11/2/2010 9:00:00 AM#");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(h,2) = CellCaption(h,1)");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(h,3) = 2");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(h,4) = CellCaption(h,3)");
_ObjectCallMethod(combobox, "ExecuteTemplate", "Columns.Item(`DateTime`).DisplayFilterDate = False");
_ObjectCallMethod( combobox , "EndUpdate");
|
485
|
How can I display a different column, on the control's label (method 2)

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "Style", 2);
_ObjectSetProperty( combobox , "SingleEdit", -1);
_ObjectSetProperty( combobox , "LabelColumnIndex", 1);
_ObjectSetProperty( combobox , "DrawGridLines", 2);
_ObjectCallMethod(combobox, "ExecuteTemplate", "Columns.Add(`Column 1`).Def(17) = 1");
_ObjectCallMethod(combobox, "ExecuteTemplate", "Columns.Add(`Column 2`).Def(17) = 1");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(AddItem(`Item 1 on <b>Column 1`),1) = `Item 1 on <b>Column 2`");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(AddItem(`Item 2 on <b>Column 1`),1) = `Item 2 on <b>Column 2`");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(AddItem(`Item 3 on <b>Column 1`),1) = `Item 3 on <b>Column 2`");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.SelectItem(FirstVisibleItem) = True");
_ObjectCallMethod( combobox , "EndUpdate");
|
484
|
How can I display a different column, on the control's label (method 1)

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "Style", 2);
_ObjectSetProperty( combobox , "SingleEdit", -1);
_ObjectSetProperty( combobox , "SearchColumnIndex", 1);
_ObjectSetProperty( combobox , "DrawGridLines", 2);
_ObjectCallMethod(combobox, "ExecuteTemplate", "Columns.Add(`Column 1`).Def(17) = 1");
_ObjectCallMethod(combobox, "ExecuteTemplate", "Columns.Add(`Column 2`).Def(17) = 1");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(AddItem(`Item 1 on <b>Column 1`),1) = `Item 1 on <b>Column 2`");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(AddItem(`Item 2 on <b>Column 1`),1) = `Item 2 on <b>Column 2`");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(AddItem(`Item 3 on <b>Column 1`),1) = `Item 3 on <b>Column 2`");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.SelectItem(FirstVisibleItem) = True");
_ObjectCallMethod( combobox , "EndUpdate");
|
483
|
How do I sort the index column as numeric

// InsertItem event - Occurs after a new item has been inserted to Items collection.
FUNCTION comboboxEvents_InsertItem(OBJECT combobox, INT Item)
OBJECT items;
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,Item")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", Item)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellData(Item,1) = ItemToIndex(Item)");
END
OBJECT column,combobox,items;
combobox = ObjectByName("AN1") ;
ObjectAssociateEvents("comboboxEvents", combobox);
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "DrawGridLines", -1);
_ObjectSetProperty( combobox , "ColumnAutoResize", -1);
_ObjectSetProperty( combobox , "ShowFocusRect", 0);
_ObjectSetProperty( combobox , "SingleEdit", -1);
column = _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Next");
_ObjectCallMethod(combobox, "TemplatePut", "Dim colObj")
_ObjectCallMethod(combobox, "TemplatePut", column)
_ObjectCallMethod(combobox, "ExecuteTemplate", "colObj.Def(48) = 4");
_ObjectCallMethod(combobox, "ExecuteTemplate", "colObj.Def(52) = 4");
column = _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Index");
_ObjectSetProperty( column , "AllowSizing", 0);
_ObjectSetProperty( column , "Width", 48);
_ObjectSetProperty( column , "FormatColumn", "(((0 := (1 index ``)) mod 3) case ( default: ``; 0 : `<r><fgcolor=B0B0B0>`; 1: ``; 2 : `<c><fgcolor=808080>` )) + str(=:0)");
_ObjectCallMethod(combobox, "ExecuteTemplate", "colObj.Def(17) = 1");
_ObjectSetProperty( column , "SortType", 5);
_ObjectSetProperty( column , "Position", 0);
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod( items , "AddItem", "Item 1");
_ObjectCallMethod( items , "AddItem", "Item 2");
_ObjectCallMethod( items , "AddItem", "Item 3");
_ObjectCallMethod( items , "AddItem", "Item 4");
_ObjectCallMethod( items , "AddItem", "Item 5");
_ObjectCallMethod( items , "AddItem", "Item 6");
_ObjectCallMethod( items , "AddItem", "Item 7");
_ObjectCallMethod( items , "AddItem", "Item 8");
_ObjectCallMethod( items , "AddItem", "Item 9");
_ObjectCallMethod( items , "AddItem", "Item 10");
_ObjectCallMethod( combobox , "EndUpdate");
|
482
|
How can I put icons/images into buttons

OBJECT column,combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "SingleEdit", -1);
_ObjectCallMethod( combobox , "Images", "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq" +
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" +
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" +
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=");
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "");
column = _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "C+B");
_ObjectSetProperty( column , "AllowSizing", 0);
_ObjectSetProperty( column , "Width", 48);
_ObjectSetProperty( column , "FormatColumn", "` <img>` + ( 1 + (1 index ``) mod 3 ) + `</img> `");
_ObjectCallMethod(combobox, "TemplatePut", "Dim colObj")
_ObjectCallMethod(combobox, "TemplatePut", column)
_ObjectCallMethod(combobox, "ExecuteTemplate", "colObj.Def(17) = 1");
_ObjectCallMethod(combobox, "ExecuteTemplate", "colObj.Def(0) = True");
_ObjectCallMethod(combobox, "ExecuteTemplate", "colObj.Def(2) = True");
_ObjectCallMethod(combobox, "ExecuteTemplate", "colObj.Def(3) = True");
_ObjectSetProperty( column , "Position", 0);
_ObjectSetProperty( combobox , "DrawGridLines", 2);
_ObjectSetProperty( combobox , "DefaultItemHeight", 20);
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod( items , "AddItem", "Item 1");
_ObjectCallMethod( items , "AddItem", "Item 2");
_ObjectCallMethod( items , "AddItem", "Item 3");
_ObjectCallMethod( items , "AddItem", "Item 4");
_ObjectCallMethod( items , "AddItem", "Item 5");
_ObjectCallMethod( items , "AddItem", "Item 6");
_ObjectCallMethod( items , "AddItem", "Item 7");
_ObjectCallMethod( items , "AddItem", "Item 8");
_ObjectCallMethod( combobox , "EndUpdate");
|
481
|
Is it possible to have a CheckBox and Button TOGETHER on all cells in a column

// CellButtonClick event - Fired after the user clicks on the cell of button type.
FUNCTION comboboxEvents_CellButtonClick(OBJECT combobox, INT Item)
Message( "CellButtonClick" );
Message( Item );
Message( _ObjectCallMethod(combobox, "ExecuteTemplate", "Key()") );
END
// CellStateChanged event - Fired after cell's state has been changed.
FUNCTION comboboxEvents_CellStateChanged(OBJECT combobox, INT Item)
Message( "CellStateChanged" );
Message( Item );
Message( _ObjectCallMethod(combobox, "ExecuteTemplate", "Key()") );
END
OBJECT column,combobox,items;
combobox = ObjectByName("AN1") ;
ObjectAssociateEvents("comboboxEvents", combobox);
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "SingleEdit", -1);
column = _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "");
_ObjectSetProperty( column , "AllowSizing", 0);
_ObjectSetProperty( column , "Width", 32);
_ObjectSetProperty( column , "FormatColumn", "1 index ``");
column = _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Def");
_ObjectSetProperty( column , "AllowSizing", 0);
_ObjectSetProperty( column , "Width", 48);
_ObjectSetProperty( column , "FormatColumn", "` `");
_ObjectCallMethod(combobox, "TemplatePut", "Dim colObj")
_ObjectCallMethod(combobox, "TemplatePut", column)
_ObjectCallMethod(combobox, "ExecuteTemplate", "colObj.Def(0) = True");
_ObjectCallMethod(combobox, "ExecuteTemplate", "colObj.Def(2) = True");
_ObjectCallMethod(combobox, "ExecuteTemplate", "colObj.Def(3) = True");
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod( items , "AddItem", "");
_ObjectCallMethod( items , "AddItem", "");
_ObjectCallMethod( items , "AddItem", "");
_ObjectCallMethod( items , "AddItem", "");
_ObjectCallMethod( items , "AddItem", "");
_ObjectCallMethod( items , "AddItem", "");
_ObjectCallMethod( items , "AddItem", "");
_ObjectCallMethod( items , "AddItem", "");
_ObjectCallMethod( combobox , "EndUpdate");
|
480
|
How can I show only the matching items, while user types in the drop down control

// EditChange event - Fired when the user has taken an action that may have altered text in an edit control.
FUNCTION comboboxEvents_EditChange(OBJECT combobox, INT ColIndex)
OBJECT items;
_ObjectCallMethod(combobox, "TemplatePut", "Dim ColIndex")
_ObjectCallMethod(combobox, "TemplatePut", ColIndex)
sLabel = _ObjectCallMethod(combobox, "ExecuteTemplate", "EditText(ColIndex)");
Message( "Select the item that maches exactly the typing label: " );
Message( sLabel );
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.SelectItem(FocusItem) = False");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,ColIndex,sLabel")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", ColIndex)
_ObjectCallMethod(combobox, "TemplatePut", sLabel)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.SelectItem(FindItem(sLabel,ColIndex)) = True");
END
OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
ObjectAssociateEvents("comboboxEvents", combobox);
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "SingleEdit", -1);
_ObjectSetProperty( combobox , "AutoComplete", 0);
_ObjectSetProperty( combobox , "AutoSelect", 0);
_ObjectSetProperty( combobox , "AutoSearch", 0);
_ObjectSetProperty( combobox , "AutoDropDown", -1);
_ObjectSetProperty( combobox , "IntegralHeight", -1);
_ObjectSetProperty( combobox , "HeaderVisible", 0);
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Friends");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod( items , "AddItem", "Fred");
_ObjectCallMethod( items , "AddItem", "Tina");
_ObjectCallMethod( items , "AddItem", "Tom");
_ObjectCallMethod( combobox , "EndUpdate");
|
479
|
How do I unselect/deselect the item (Simple style)
OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "Style", 0);
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Def");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod( items , "AddItem", "Item 1");
_ObjectCallMethod( items , "AddItem", "Item 2");
_ObjectCallMethod( items , "AddItem", "Item 3");
_ObjectCallMethod( items , "AddItem", "Item 3");
_ObjectSetProperty( combobox , "SearchColumnIndex", 0);
_ObjectSetProperty( combobox , "Value", "Item 2");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.SelectItem(FocusItem) = False");
_ObjectCallMethod( combobox , "EndUpdate");
|
478
|
How do I unselect/deselect the item (DropDownList style)
OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "Style", 1);
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Def");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod( items , "AddItem", "Item 1");
_ObjectCallMethod( items , "AddItem", "Item 2");
_ObjectCallMethod( items , "AddItem", "Item 3");
_ObjectCallMethod( items , "AddItem", "Item 3");
_ObjectSetProperty( combobox , "SearchColumnIndex", 0);
_ObjectSetProperty( combobox , "Value", "Item 2");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.SelectItem(FocusItem) = False");
_ObjectCallMethod( combobox , "EndUpdate");
|
477
|
How do I unselect/deselect the item (DropDown style)
OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "Style", 1);
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Def");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod( items , "AddItem", "Item 1");
_ObjectCallMethod( items , "AddItem", "Item 2");
_ObjectCallMethod( items , "AddItem", "Item 3");
_ObjectCallMethod( items , "AddItem", "Item 3");
_ObjectSetProperty( combobox , "SearchColumnIndex", 0);
_ObjectSetProperty( combobox , "Value", "Item 2");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.SelectItem(FocusItem) = False");
_ObjectCallMethod( combobox , "EndUpdate");
|
476
|
Setting the ForeColor to red and then setting Enabled property on False the ForeColor returns back to original color of black/gray. What can be done (Style is Simple)

OBJECT columns,combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "Style", 0);
_ObjectSetProperty( combobox , "ColumnAutoResize", -1);
columns = _ObjectGetProperty( combobox , "Columns");
_ObjectCallMethod( columns , "Add", "C1");
_ObjectCallMethod( columns , "Add", "C2");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(AddItem(`item a`),1) = `item b`");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(AddItem(`item c`),1) = `item d`");
_ObjectSetProperty( combobox , "Value", "item a");
_ObjectSetProperty( combobox , "ForeColor", 12353664);
_ObjectSetProperty( combobox , "BackColor", 15790320);
_ObjectSetProperty( combobox , "HeaderForeColor", 8421504);
_ObjectSetProperty( combobox , "SelBackColor", 8421504);
_ObjectSetProperty( combobox , "BackColorEdit", 0);
_ObjectSetProperty( combobox , "ForeColorEdit", 16777215);
_ObjectSetProperty( combobox , "Enabled", 0);
_ObjectCallMethod( combobox , "EndUpdate");
|
475
|
Setting the ForeColor to red and then setting Enabled property on False the ForeColor returns back to original color of black/gray. What can be done (Style is DropDownList)

OBJECT columns,combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "Style", 2);
_ObjectSetProperty( combobox , "ColumnAutoResize", -1);
columns = _ObjectGetProperty( combobox , "Columns");
_ObjectCallMethod( columns , "Add", "C1");
_ObjectCallMethod( columns , "Add", "C2");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(AddItem(`item a`),1) = `item b`");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(AddItem(`item c`),1) = `item d`");
_ObjectSetProperty( combobox , "Value", "item a");
_ObjectSetProperty( combobox , "BackColorEdit", 0);
_ObjectSetProperty( combobox , "ForeColor", 16777215);
_ObjectSetProperty( combobox , "Enabled", 0);
_ObjectCallMethod( combobox , "EndUpdate");
|
474
|
Setting the ForeColor to red and then setting Enabled property on False the ForeColor returns back to original color of black/gray. What can be done (Style is DropDown)

OBJECT columns,combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "Style", 1);
_ObjectSetProperty( combobox , "ColumnAutoResize", -1);
columns = _ObjectGetProperty( combobox , "Columns");
_ObjectCallMethod( columns , "Add", "C1");
_ObjectCallMethod( columns , "Add", "C2");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(AddItem(`item a`),1) = `item b`");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(AddItem(`item c`),1) = `item d`");
_ObjectSetProperty( combobox , "Value", "item a");
_ObjectSetProperty( combobox , "ForeColorEdit", 16777215);
_ObjectSetProperty( combobox , "BackColorEdit", 0);
_ObjectSetProperty( combobox , "Enabled", 0);
_ObjectCallMethod( combobox , "EndUpdate");
|
473
|
How would you clear the displayed selection for style DropDownList. So if a user selects or searches a value in a style DropDownList, I want to know if I can reset the control back to an empty selection

// DropUp event - Occurs when the drop-down portion of the control is hidden.
FUNCTION comboboxEvents_DropUp()
_ObjectSetProperty( combobox , "Value", "");
END
// SelectionChanged event - Fired after a new item has been selected.
FUNCTION comboboxEvents_SelectionChanged()
Message( "You selected: " );
Message( _ObjectGetProperty( combobox , "Value") );
END
OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
ObjectAssociateEvents("comboboxEvents", combobox);
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "Style", 2);
_ObjectSetProperty( combobox , "HeaderVisible", 0);
_ObjectSetProperty( combobox , "AutoSearch", -1);
_ObjectSetProperty( combobox , "AutoDropDown", -1);
_ObjectSetProperty( combobox , "IntegralHeight", -1);
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Default") , "AutoSearch", 1);
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod( items , "AddItem", "This is a bit of text");
_ObjectCallMethod( items , "AddItem", "This is a another text");
_ObjectSetProperty( items , "DefaultItem", _ObjectCallMethod( items , "InsertItem", "","",""));
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ItemPosition(0) = 0");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.SortableItem(0) = False");
_ObjectCallMethod( combobox , "EndUpdate");
|
472
|
I cannot seem to get autosearch=1 (contains) in the column object to search properly. It still only finds items that start with the typed character. I want to it look to see if the typed character(s) are contained in the item. I Can't seem to get this to work

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "Style", 2);
_ObjectSetProperty( combobox , "HeaderVisible", 0);
_ObjectSetProperty( combobox , "AutoSearch", -1);
_ObjectSetProperty( combobox , "AutoDropDown", -1);
_ObjectSetProperty( combobox , "IntegralHeight", -1);
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Default") , "AutoSearch", 1);
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod( items , "AddItem", "This is a bit of text");
_ObjectCallMethod( items , "AddItem", "This is a another text");
_ObjectCallMethod( combobox , "EndUpdate");
|
471
|
If the user selects an item from the list, how can I clear that selection and return the control to the unselected state with the PROMPT text

// DropUp event - Occurs when the drop-down portion of the control is hidden.
FUNCTION comboboxEvents_DropUp()
_ObjectCallMethod(combobox, "ExecuteTemplate", "EditText(0) = ``");
END
// SelectionChanged event - Fired after a new item has been selected.
FUNCTION comboboxEvents_SelectionChanged()
Message( "You selected: " );
Message( _ObjectGetProperty( combobox , "Value") );
END
OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
ObjectAssociateEvents("comboboxEvents", combobox);
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "LabelHeight", 23);
_ObjectSetProperty( combobox , "IntegralHeight", -1);
_ObjectSetProperty( combobox , "AutoComplete", 0);
_ObjectSetProperty( combobox , "AutoSearch", 0);
_ObjectSetProperty( combobox , "AutoDropDown", -1);
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Default") , "Prompt", "<i><fgcolor=808080>type something</fgcolor></i>");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod( items , "AddItem", 0);
_ObjectCallMethod( items , "AddItem", 1);
_ObjectCallMethod( items , "AddItem", 2);
_ObjectCallMethod( combobox , "EndUpdate");
|
470
|
How do I get notified once the user changes the Filter For field
// EditChange event - Fired when the user has taken an action that may have altered text in an edit control.
FUNCTION comboboxEvents_EditChange(OBJECT combobox, INT ColIndex)
Message( "ColIndex: " );
Message( ColIndex );
Message( "Label: " );
Message( _ObjectCallMethod(combobox, "ExecuteTemplate", "EditText(0)") );
Message( "FilterFor: " );
Message( _ObjectCallMethod(combobox, "ExecuteTemplate", "EditText(-1)") );
END
OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
ObjectAssociateEvents("comboboxEvents", combobox);
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "FilterForVisible", -1);
_ObjectSetProperty( combobox , "FilterForBackColor", 15790320);
_ObjectSetProperty( combobox , "IntegralHeight", -1);
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Default");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod( items , "AddItem", "Item 1");
_ObjectCallMethod( items , "AddItem", "Item 2");
_ObjectCallMethod( items , "AddItem", "Item 3");
_ObjectCallMethod( items , "AddItem", "Item 4");
_ObjectCallMethod( items , "AddItem", "Item 5");
_ObjectCallMethod( combobox , "EndUpdate");
|
469
|
I am using the ScrollWidth/ScrollHeight property on 0 to hide the control's scroll bars, the question is that the drop down button is disappearing. What can be done so I can still show the drop down button

OBJECT combobox;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "LabelHeight", 40);
_ObjectSetProperty( combobox , "ScrollWidth", 0);
_ObjectSetProperty( combobox , "ScrollHeight", 0);
_ObjectSetProperty( combobox , "DropDownButtonWidth", 40);
_ObjectCallMethod( combobox , "EndUpdate");
|
468
|
Does your control supports scrolling by touching the screen

OBJECT combobox,rs;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "ColumnAutoResize", 0);
rs = CreateObject("ADOR.Recordset");
_ObjectCallMethod( rs , "Open", "Orders","Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Program Files\Exontrol\ExComboBox\Sample\Access\sample.mdb",3,3);
_ObjectSetProperty( combobox , "DataSource", rs);
_ObjectSetProperty( combobox , "ScrollBySingleLine", -1);
_ObjectSetProperty( combobox , "AutoDrag", 4112);
_ObjectCallMethod( combobox , "EndUpdate");
|
467
|
How can I make bigger/enlarge the control's drop down button

OBJECT combobox;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "LabelHeight", 40);
_ObjectSetProperty( combobox , "ScrollWidth", 40);
_ObjectCallMethod( combobox , "EndUpdate");
|
466
|
How do I select a NULL/empty value

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "Style", 2);
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Items");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod( items , "AddItem", "Item 1");
_ObjectCallMethod( items , "AddItem", "Item 2");
_ObjectCallMethod( items , "AddItem", "Item 3");
_ObjectCallMethod( items , "AddItem", "Item 4");
_ObjectSetProperty( items , "DefaultItem", _ObjectCallMethod( items , "InsertItem", "","",""));
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ItemPosition(0) = 0");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.SortableItem(0) = False");
_ObjectSetProperty( combobox , "Value", "");
_ObjectCallMethod( combobox , "EndUpdate");
|
465
|
How can I add a vertical padding

OBJECT column,combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "DrawGridLines", -1);
column = _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Padding");
_ObjectCallMethod(combobox, "TemplatePut", "Dim colObj")
_ObjectCallMethod(combobox, "TemplatePut", column)
_ObjectCallMethod(combobox, "ExecuteTemplate", "colObj.Def(0) = True");
_ObjectCallMethod(combobox, "ExecuteTemplate", "colObj.Def(16) = False");
_ObjectCallMethod(combobox, "ExecuteTemplate", "colObj.Def(48) = 6");
_ObjectCallMethod(combobox, "ExecuteTemplate", "colObj.Def(49) = 6");
_ObjectCallMethod(combobox, "ExecuteTemplate", "colObj.Def(50) = 6");
_ObjectCallMethod(combobox, "ExecuteTemplate", "colObj.Def(51) = 6");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod( items , "AddItem", "padding");
_ObjectCallMethod( items , "AddItem", "padding");
_ObjectCallMethod( combobox , "EndUpdate");
|
464
|
How can I add or change the padding (spaces) for captions in the control's header

OBJECT column,combobox;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectCallMethod(combobox, "ExecuteTemplate", "Columns.Add(`Padding-Left`).Def(52) = 18");
column = _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Padding-Right");
_ObjectCallMethod(combobox, "TemplatePut", "Dim colObj")
_ObjectCallMethod(combobox, "TemplatePut", column)
_ObjectCallMethod(combobox, "ExecuteTemplate", "colObj.Def(53) = 18");
_ObjectSetProperty( column , "HeaderAlignment", 2);
_ObjectCallMethod( combobox , "EndUpdate");
|
463
|
Is it possible to change the height for all items at once

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "LinesAtRoot", -1);
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Items");
items = _ObjectGetProperty( combobox , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
h = _ObjectCallMethod( items , "AddItem", "Root 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ExpandItem(0) = True");
_ObjectCallMethod( combobox , "EndUpdate");
_ObjectSetProperty( combobox , "DefaultItemHeight", 12);
_ObjectCallMethod(combobox, "ExecuteTemplate", "Items.ItemHeight(0) = 12");
|
462
|
How can I have a case-insensitive filter (exFilterDoCaseSensitive flag is not set)

OBJECT column,columns,combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "MarkSearchColumn", 0);
columns = _ObjectGetProperty( combobox , "Columns");
column = _ObjectCallMethod( columns , "Add", "Car");
_ObjectSetProperty( column , "DisplayFilterButton", -1);
_ObjectSetProperty( column , "FilterType", 240);
_ObjectSetProperty( column , "Filter", "MAZDA");
column = _ObjectCallMethod( columns , "Add", "Equipment");
_ObjectSetProperty( column , "DisplayFilterButton", -1);
_ObjectSetProperty( column , "DisplayFilterPattern", 0);
_ObjectSetProperty( column , "CustomFilter", "Air Bag||*Air Bag*|||Air condition||*Air condition*|||ABS||*ABS*|||ESP||*ESP*");
_ObjectSetProperty( column , "FilterType", 3);
_ObjectSetProperty( column , "Filter", "AIR BAG");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(AddItem(`Mazda`),1) = `Air Bag`");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(AddItem(`Toyota`),1) = `Air Bag,Air condition`");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(AddItem(`Ford`),1) = `Air condition`");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(AddItem(`Nissan`),1) = `Air Bag,ABS,ESP`");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(AddItem(`Mazda`),1) = `Air Bag, ABS,ESP`");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(AddItem(`Mazda`),1) = `ABS,ESP`");
_ObjectCallMethod( combobox , "ApplyFilter");
_ObjectCallMethod( combobox , "EndUpdate");
|
461
|
How can I have a case-sensitive filter

OBJECT column,columns,combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "MarkSearchColumn", 0);
columns = _ObjectGetProperty( combobox , "Columns");
column = _ObjectCallMethod( columns , "Add", "Car");
_ObjectSetProperty( column , "DisplayFilterButton", -1);
_ObjectSetProperty( column , "FilterType", 496);
_ObjectSetProperty( column , "Filter", "Mazda");
column = _ObjectCallMethod( columns , "Add", "Equipment");
_ObjectSetProperty( column , "DisplayFilterButton", -1);
_ObjectSetProperty( column , "DisplayFilterPattern", 0);
_ObjectSetProperty( column , "CustomFilter", "Air Bag||*Air Bag*|||Air condition||*Air condition*|||ABS||*ABS*|||ESP||*ESP*");
_ObjectSetProperty( column , "FilterType", 259);
_ObjectSetProperty( column , "Filter", "Air Bag");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(AddItem(`Mazda`),1) = `Air Bag`");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(AddItem(`Toyota`),1) = `Air Bag,Air condition`");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(AddItem(`Ford`),1) = `Air condition`");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(AddItem(`Nissan`),1) = `Air Bag,ABS,ESP`");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(AddItem(`Mazda`),1) = `Air Bag, ABS,ESP`");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(AddItem(`Mazda`),1) = `ABS,ESP`");
_ObjectCallMethod( combobox , "ApplyFilter");
_ObjectCallMethod( combobox , "EndUpdate");
|
460
|
Is it possible to filter the items as I type

// EditChange event - Fired when the user has taken an action that may have altered text in an edit control.
FUNCTION comboboxEvents_EditChange(OBJECT combobox, INT ColIndex)
_ObjectCallMethod(combobox, "ExecuteTemplate", "Columns.Item(0).Filter = Me.EditText(0)");
_ObjectCallMethod( combobox , "ApplyFilter");
END
OBJECT column,columns,combobox,items;
combobox = ObjectByName("AN1") ;
ObjectAssociateEvents("comboboxEvents", combobox);
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "MarkSearchColumn", 0);
_ObjectSetProperty( combobox , "SingleEdit", -1);
_ObjectSetProperty( combobox , "AutoComplete", 0);
_ObjectSetProperty( combobox , "AutoDropDown", -1);
_ObjectSetProperty( combobox , "IntegralHeight", -1);
columns = _ObjectGetProperty( combobox , "Columns");
column = _ObjectCallMethod( columns , "Add", "Items");
_ObjectSetProperty( column , "Prompt", "<i><fgcolor=808080>Start Filter</fgcolor></i>");
_ObjectSetProperty( column , "FilterType", 3);
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod( items , "AddItem", "A");
_ObjectCallMethod( items , "AddItem", "B");
_ObjectCallMethod( items , "AddItem", "C");
_ObjectCallMethod( items , "AddItem", "AB");
_ObjectCallMethod( items , "AddItem", "AC");
_ObjectCallMethod( items , "AddItem", "BA");
_ObjectCallMethod( items , "AddItem", "BC");
_ObjectCallMethod( items , "AddItem", "CC");
_ObjectCallMethod( combobox , "EndUpdate");
|
459
|
What is the equivalent to combo1.text=combo1.list(index) to select a row in the combo

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Default");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod( items , "AddItem", "A");
_ObjectCallMethod( items , "AddItem", "B");
_ObjectCallMethod( items , "AddItem", "C");
_ObjectCallMethod( items , "AddItem", "D");
_ObjectCallMethod(combobox, "ExecuteTemplate", "EditText(0) = `C`");
|
458
|
What is the equivalent to combo1.text=combo1.list(index) to select a row in the combo

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Default");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod( items , "AddItem", "A");
_ObjectCallMethod( items , "AddItem", "B");
_ObjectCallMethod( items , "AddItem", "C");
_ObjectCallMethod( items , "AddItem", "D");
_ObjectCallMethod(combobox, "ExecuteTemplate", "EditText(0) = Me.Items.CellCaption(Me.Items.ItemByIndex(2),0)");
|
457
|
What is the equivalent to combo1.text=combo1.list(index) to select a row in the combo

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Default");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod( items , "AddItem", "A");
_ObjectCallMethod( items , "AddItem", "B");
_ObjectCallMethod( items , "AddItem", "C");
_ObjectCallMethod( items , "AddItem", "D");
_ObjectCallMethod(combobox, "ExecuteTemplate", "Select(0) = Me.Items.CellCaption(Me.Items.ItemByIndex(2),0)");
|
456
|
What is the equivalent to combo1.text=combo1.list(index) to select a row in the combo

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Default");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod( items , "AddItem", "A");
_ObjectCallMethod( items , "AddItem", "B");
_ObjectCallMethod( items , "AddItem", "C");
_ObjectCallMethod( items , "AddItem", "D");
_ObjectCallMethod(combobox, "ExecuteTemplate", "Select(0) = `C`");
|
455
|
How can I change the color, font, bold etc for the items/cells in the same column or for the entire column

OBJECT column,combobox,conditionalformat,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "MarkSearchColumn", 0);
conditionalformat = _ObjectCallMethod( _ObjectGetProperty( combobox , "ConditionalFormats") , "Add", "1");
_ObjectSetProperty( conditionalformat , "Bold", -1);
_ObjectSetProperty( conditionalformat , "ForeColor", 255);
_ObjectSetProperty( conditionalformat , "ApplyTo", 1);
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "C1");
column = _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "C2");
_ObjectSetProperty( column , "HeaderBold", -1);
_ObjectSetProperty( column , "HTMLCaption", "<fgcolor=FF0000>C2");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(AddItem(10),1) = 11");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(AddItem(12),1) = 13");
_ObjectCallMethod( combobox , "EndUpdate");
|
454
|
How can I add a horizontal scroll bar

OBJECT column,combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "ScrollBySingleLine", -1);
_ObjectSetProperty( combobox , "ColumnAutoResize", 0);
_ObjectSetProperty( combobox , "BackColorAlternate", 15790320);
column = _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Default");
_ObjectSetProperty( column , "Width", 512);
_ObjectCallMethod(combobox, "TemplatePut", "Dim colObj")
_ObjectCallMethod(combobox, "TemplatePut", column)
_ObjectCallMethod(combobox, "ExecuteTemplate", "colObj.Def(16) = False");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod( items , "AddItem", "Exontrol is devoted to create innovative user interface components for Windows applications, on COM or .NET platforms, since 19" +
"99. ^"eXontrol^" comes from e(s)pecial (c)ontrol, where sc makes the X. We are a vendor not a reseller, and this is the single s" +
"ite where you can try or buy our products. If you are tired of looking for ^"powerful^" components now it's time to show you rea" +
"l components. No registration required, no nag screens, no limitations, unlimited evaluation time.");
_ObjectCallMethod( items , "AddItem", "A combo box is a commonly-used GUI tool. It is a combination of a drop-down list or list box and a single-line textbox, allowin" +
"g the user either to type a value directly into the control or choose from the list of existing options.");
_ObjectCallMethod( combobox , "EndUpdate");
|
453
|
Does the control have the option to have a horizontal scroll to show entries which are longer than the display

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "ColumnAutoResize", 0);
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Default") , "Width", 512);
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod( items , "AddItem", "Exontrol is devoted to create innovative user interface components for Windows applications, on COM or .NET platforms, since 19" +
"99. ^"eXontrol^" comes from e(s)pecial (c)ontrol, where sc makes the X. We are a vendor not a reseller, and this is the single s" +
"ite where you can try or buy our products. If you are tired of looking for ^"powerful^" components now it's time to show you rea" +
"l components. No registration required, no nag screens, no limitations, unlimited evaluation time.");
_ObjectCallMethod( items , "AddItem", "A combo box is a commonly-used GUI tool. It is a combination of a drop-down list or list box and a single-line textbox, allowin" +
"g the user either to type a value directly into the control or choose from the list of existing options.");
_ObjectCallMethod( combobox , "EndUpdate");
|
452
|
Is it possible to auto-numbering the children items but still keeps the position after filtering

OBJECT column,combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "LinesAtRoot", -1);
column = _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Items");
_ObjectSetProperty( column , "DisplayFilterButton", -1);
_ObjectSetProperty( column , "FilterType", 240);
_ObjectSetProperty( column , "Filter", "Child 2");
column = _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Pos.1");
_ObjectSetProperty( column , "FormatColumn", "1 ropos ''");
_ObjectSetProperty( column , "Position", 0);
_ObjectSetProperty( column , "Width", 32);
_ObjectSetProperty( column , "AllowSizing", 0);
column = _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Pos.2");
_ObjectSetProperty( column , "FormatColumn", "1 ropos ':'");
_ObjectSetProperty( column , "Position", 1);
_ObjectSetProperty( column , "Width", 32);
_ObjectSetProperty( column , "AllowSizing", 0);
column = _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Pos.3");
_ObjectSetProperty( column , "FormatColumn", "1 ropos ':|A-Z'");
_ObjectSetProperty( column , "Position", 2);
_ObjectSetProperty( column , "Width", 32);
_ObjectSetProperty( column , "AllowSizing", 0);
column = _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Pos.4");
_ObjectSetProperty( column , "FormatColumn", "1 ropos '|A-Z|'");
_ObjectSetProperty( column , "Position", 3);
_ObjectSetProperty( column , "Width", 32);
_ObjectSetProperty( column , "AllowSizing", 0);
column = _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Pos.5");
_ObjectSetProperty( column , "FormatColumn", "'<font Tahoma;7>' + 1 ropos '-<b>||A-Z'");
_ObjectCallMethod(combobox, "TemplatePut", "Dim colObj")
_ObjectCallMethod(combobox, "TemplatePut", column)
_ObjectCallMethod(combobox, "ExecuteTemplate", "colObj.Def(17) = 1");
_ObjectSetProperty( column , "Position", 4);
_ObjectSetProperty( column , "Width", 32);
_ObjectSetProperty( column , "AllowSizing", 0);
column = _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Pos.6");
_ObjectSetProperty( column , "FormatColumn", "'<b>'+ 1 ropos '</b>:<fgcolor=FF0000>|A-Z|'");
_ObjectCallMethod(combobox, "ExecuteTemplate", "colObj.Def(17) = 1");
_ObjectSetProperty( column , "Position", 5);
_ObjectSetProperty( column , "Width", 48);
_ObjectSetProperty( column , "AllowSizing", 0);
items = _ObjectGetProperty( combobox , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
h = _ObjectCallMethod( items , "AddItem", "Root 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod( combobox , "ApplyFilter");
_ObjectCallMethod( combobox , "EndUpdate");
|
451
|
How do I prevent scrolling the control's data after user does the sort

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectSetProperty( combobox , "EnsureOnSort", 0);
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Column");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod( items , "AddItem", "Item 3");
_ObjectCallMethod( items , "AddItem", "Item 1");
_ObjectCallMethod( items , "AddItem", "Item 2");
_ObjectCallMethod( combobox , "PutItems", _ObjectCallMethod( combobox , "GetItems", 0));
_ObjectCallMethod( combobox , "PutItems", _ObjectCallMethod( combobox , "GetItems", 0));
_ObjectCallMethod( combobox , "PutItems", _ObjectCallMethod( combobox , "GetItems", 0));
_ObjectCallMethod(combobox, "ExecuteTemplate", "Columns.Item(0).SortOrder = 1");
|
450
|
Is it possible to auto-numbering the children items too

OBJECT column,combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "LinesAtRoot", -1);
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Items");
column = _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Pos.1");
_ObjectSetProperty( column , "FormatColumn", "1 rpos ''");
_ObjectSetProperty( column , "Position", 0);
_ObjectSetProperty( column , "Width", 32);
_ObjectSetProperty( column , "AllowSizing", 0);
column = _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Pos.2");
_ObjectSetProperty( column , "FormatColumn", "1 rpos ':'");
_ObjectSetProperty( column , "Position", 1);
_ObjectSetProperty( column , "Width", 32);
_ObjectSetProperty( column , "AllowSizing", 0);
column = _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Pos.3");
_ObjectSetProperty( column , "FormatColumn", "1 rpos ':|A-Z'");
_ObjectSetProperty( column , "Position", 2);
_ObjectSetProperty( column , "Width", 32);
_ObjectSetProperty( column , "AllowSizing", 0);
column = _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Pos.4");
_ObjectSetProperty( column , "FormatColumn", "1 rpos '|A-Z|'");
_ObjectSetProperty( column , "Position", 3);
_ObjectSetProperty( column , "Width", 32);
_ObjectSetProperty( column , "AllowSizing", 0);
column = _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Pos.5");
_ObjectSetProperty( column , "FormatColumn", "'<font Tahoma;7>' + 1 rpos '-<b>||A-Z'");
_ObjectCallMethod(combobox, "TemplatePut", "Dim colObj")
_ObjectCallMethod(combobox, "TemplatePut", column)
_ObjectCallMethod(combobox, "ExecuteTemplate", "colObj.Def(17) = 1");
_ObjectSetProperty( column , "Position", 4);
_ObjectSetProperty( column , "Width", 32);
_ObjectSetProperty( column , "AllowSizing", 0);
column = _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Pos.6");
_ObjectSetProperty( column , "FormatColumn", "'<b>'+ 1 rpos '</b>:<fgcolor=FF0000>|A-Z|'");
_ObjectCallMethod(combobox, "ExecuteTemplate", "colObj.Def(17) = 1");
_ObjectSetProperty( column , "Position", 5);
_ObjectSetProperty( column , "Width", 48);
_ObjectSetProperty( column , "AllowSizing", 0);
items = _ObjectGetProperty( combobox , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
h = _ObjectCallMethod( items , "AddItem", "Root 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod( combobox , "EndUpdate");
|
449
|
How can I show the child items with no identation

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectSetProperty( combobox , "LinesAtRoot", 5);
_ObjectSetProperty( combobox , "Indent", 12);
_ObjectSetProperty( combobox , "HasLines", 2);
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Default");
items = _ObjectGetProperty( combobox , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child 3");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
h = _ObjectCallMethod( items , "AddItem", "Root 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child 3");
|
448
|
Is there other ways of showing the hierarchy lines (exGroupLinesAtRoot)

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectSetProperty( combobox , "LinesAtRoot", 1);
_ObjectSetProperty( combobox , "Indent", 12);
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Default");
items = _ObjectGetProperty( combobox , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child 3");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
|
447
|
Is there other ways of showing the hierarchy lines (exGroupLinesOutside)

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectSetProperty( combobox , "LinesAtRoot", 5);
_ObjectSetProperty( combobox , "Indent", 12);
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Default");
items = _ObjectGetProperty( combobox , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child 3");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
h = _ObjectCallMethod( items , "AddItem", "Root 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child 3");
|
446
|
Is there other ways of showing the hierarchy lines (exGroupLinesInsideLeaf)

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectSetProperty( combobox , "LinesAtRoot", 4);
_ObjectSetProperty( combobox , "Indent", 12);
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Default");
items = _ObjectGetProperty( combobox , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child 3");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
|
445
|
Is there other ways of showing the hierarchy lines (exGroupLinesInside)

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectSetProperty( combobox , "LinesAtRoot", 3);
_ObjectSetProperty( combobox , "Indent", 12);
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Default");
items = _ObjectGetProperty( combobox , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child 3");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
|
444
|
Is there other ways of showing the hierarchy lines (exGroupLines)

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectSetProperty( combobox , "LinesAtRoot", 2);
_ObjectSetProperty( combobox , "Indent", 12);
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Default");
items = _ObjectGetProperty( combobox , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", _ObjectCallMethod( items , "InsertItem", h,"","Child 2"),"","SubChild 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child 3");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
|
443
|
Is it possible display numbers in the same format no matter of regional settings in the control panel

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectCallMethod(combobox, "ExecuteTemplate", "Columns.Add(`Def`).Def(17) = 1");
items = _ObjectGetProperty( combobox , "Items");
h = _ObjectCallMethod( items , "AddItem", 100000.27);
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.FormatCell(h,0) = `(value format '') + ' <fgcolor=808080>(default positive)'`");
h = _ObjectCallMethod( items , "AddItem", 100000.27);
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.FormatCell(h,0) = `(value format '2|.|3|,|1|1')`");
h = _ObjectCallMethod( items , "AddItem", -100000.27);
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.FormatCell(h,0) = `(value format '') + ' <fgcolor=808080>(default negative)'`");
h = _ObjectCallMethod( items , "AddItem", -100000.27);
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.FormatCell(h,0) = `(value format '2|.|3|,|1|1')`");
_ObjectCallMethod( combobox , "EndUpdate");
|
442
|
Is it possible to add a 0 for numbers less than 1 instead .7 to show 0.8

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectCallMethod(combobox, "ExecuteTemplate", "Columns.Add(`Def`).Def(17) = 1");
items = _ObjectGetProperty( combobox , "Items");
h = _ObjectCallMethod( items , "AddItem", 0.27);
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.FormatCell(h,0) = `(value format '') + ' <fgcolor=808080>(default)'`");
h = _ObjectCallMethod( items , "AddItem", 0.27);
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.FormatCell(h,0) = `(value format '|||||0') + ' <fgcolor=808080>(Display no leading zeros)'`");
_ObjectCallMethod( combobox , "EndUpdate");
|
441
|
How can I specify the format for negative numbers

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectCallMethod(combobox, "ExecuteTemplate", "Columns.Add(`Def`).Def(17) = 1");
items = _ObjectGetProperty( combobox , "Items");
h = _ObjectCallMethod( items , "AddItem", -100000.27);
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.FormatCell(h,0) = `(value format '') + ' <fgcolor=808080>(default)'`");
h = _ObjectCallMethod( items , "AddItem", -100000.27);
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.FormatCell(h,0) = `(value format '||||1') + ' <fgcolor=808080>(Negative sign, number; for example, -1.1)'`");
_ObjectCallMethod( combobox , "EndUpdate");
|
440
|
Is it possible to change the grouping character when display numbers

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectCallMethod(combobox, "ExecuteTemplate", "Columns.Add(`Def`).Def(17) = 1");
items = _ObjectGetProperty( combobox , "Items");
h = _ObjectCallMethod( items , "AddItem", 100000.27);
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.FormatCell(h,0) = `(value format '') + ' <fgcolor=808080>(default)'`");
h = _ObjectCallMethod( items , "AddItem", 100000.27);
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.FormatCell(h,0) = `(value format '|||-') + ' <fgcolor=808080>(grouping character is -)'`");
_ObjectCallMethod( combobox , "EndUpdate");
|
439
|
How can I display numbers with 2 digits in each group

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectCallMethod(combobox, "ExecuteTemplate", "Columns.Add(`Def`).Def(17) = 1");
items = _ObjectGetProperty( combobox , "Items");
h = _ObjectCallMethod( items , "AddItem", 100000.27);
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.FormatCell(h,0) = `(value format '') + ' <fgcolor=808080>(default)'`");
h = _ObjectCallMethod( items , "AddItem", 100000.27);
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.FormatCell(h,0) = `(value format '||2') + ' <fgcolor=808080>(grouping by 2 digits)'`");
_ObjectCallMethod( combobox , "EndUpdate");
|
438
|
How can I display my numbers using a different decimal separator

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectCallMethod(combobox, "ExecuteTemplate", "Columns.Add(`Def`).Def(17) = 1");
items = _ObjectGetProperty( combobox , "Items");
h = _ObjectCallMethod( items , "AddItem", 100.27);
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.FormatCell(h,0) = `(value format '') + ' <fgcolor=808080>(default)'`");
h = _ObjectCallMethod( items , "AddItem", 100.27);
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.FormatCell(h,0) = `(value format '|;') + ' <fgcolor=808080>(decimal separator is <b>;</b>)'`");
_ObjectCallMethod( combobox , "EndUpdate");
|
437
|
Is it possible to display the numbers using 3 (three) digits

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectCallMethod(combobox, "ExecuteTemplate", "Columns.Add(`Def`).Def(17) = 1");
items = _ObjectGetProperty( combobox , "Items");
h = _ObjectCallMethod( items , "AddItem", 100.27);
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.FormatCell(h,0) = `(value format '') + ' <fgcolor=808080>(default)'`");
h = _ObjectCallMethod( items , "AddItem", 100.27);
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.FormatCell(h,0) = `(value format '3') + ' <fgcolor=808080>(3 digits)'`");
h = _ObjectCallMethod( items , "AddItem", 100.27);
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.FormatCell(h,0) = `(value format 2) + ' <fgcolor=808080>(2 digits)'`");
h = _ObjectCallMethod( items , "AddItem", 100.27);
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.FormatCell(h,0) = `(value format 1) + ' <fgcolor=808080>(1 digit)'`");
_ObjectCallMethod( combobox , "EndUpdate");
|
436
|
Is it possible to format numbers

OBJECT column,columns,combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "MarkSearchColumn", 0);
columns = _ObjectGetProperty( combobox , "Columns");
_ObjectCallMethod( columns , "Add", "Name");
column = _ObjectCallMethod( columns , "Add", "A");
_ObjectSetProperty( column , "SortType", 1);
_ObjectSetProperty( column , "AllowSizing", 0);
_ObjectSetProperty( column , "Width", 36);
_ObjectSetProperty( column , "FormatColumn", "len(value) ? value + ' +'");
column = _ObjectCallMethod( columns , "Add", "B");
_ObjectSetProperty( column , "SortType", 1);
_ObjectSetProperty( column , "AllowSizing", 0);
_ObjectSetProperty( column , "Width", 36);
_ObjectSetProperty( column , "FormatColumn", "len(value) ? value + ' +'");
column = _ObjectCallMethod( columns , "Add", "C");
_ObjectSetProperty( column , "SortType", 1);
_ObjectSetProperty( column , "AllowSizing", 0);
_ObjectSetProperty( column , "Width", 36);
_ObjectSetProperty( column , "FormatColumn", "len(value) ? value + ' ='");
column = _ObjectCallMethod( columns , "Add", "A+B+C");
_ObjectSetProperty( column , "SortType", 1);
_ObjectSetProperty( column , "Width", 64);
_ObjectSetProperty( column , "ComputedField", "dbl(%1)+dbl(%2)+dbl(%3)");
_ObjectSetProperty( column , "FormatColumn", "type(value) in (0,1) ? 'null' : ( dbl(value)<0 ? '<fgcolor=FF0000>'+ (value format '2|.|3|,|1' ) : (dbl(value)>0 ? '<fgcolor=00" +
"00FF>+'+(value format '2|.|3|,' ): '0.00') )");
_ObjectCallMethod(combobox, "TemplatePut", "Dim colObj")
_ObjectCallMethod(combobox, "TemplatePut", column)
_ObjectCallMethod(combobox, "ExecuteTemplate", "colObj.Def(17) = 1");
items = _ObjectGetProperty( combobox , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaptionFormat(h,4) = 2");
h1 = _ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h1")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h1)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(h1,1) = 7");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(h1,2) = 3");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(h1,3) = 1");
h1 = _ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(h1,1) = -2");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(h1,2) = -2");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(h1,3) = -4");
h1 = _ObjectCallMethod( items , "InsertItem", h,"","Child 3");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(h1,1) = 2");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(h1,2) = 2");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(h1,3) = -4");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
_ObjectCallMethod( combobox , "EndUpdate");
|
435
|
Is it possible to limit the height of the item while resizing

// InsertItem event - Occurs after a new item has been inserted to Items collection.
FUNCTION comboboxEvents_InsertItem(OBJECT combobox, INT Item)
_ObjectCallMethod(combobox, "TemplatePut", "Dim Item")
_ObjectCallMethod(combobox, "TemplatePut", Item)
_ObjectCallMethod(combobox, "ExecuteTemplate", "Items.ItemMinHeight(Item) = 18");
_ObjectCallMethod(combobox, "ExecuteTemplate", "Items.ItemMaxHeight(Item) = 72");
END
OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
ObjectAssociateEvents("comboboxEvents", combobox);
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "ItemsAllowSizing", -1);
_ObjectSetProperty( combobox , "ScrollBySingleLine", 0);
_ObjectSetProperty( combobox , "BackColorAlternate", 15790320);
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Names");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod( items , "AddItem", "Mantel");
_ObjectCallMethod( items , "AddItem", "Mechanik");
_ObjectCallMethod( items , "AddItem", "Motor");
_ObjectCallMethod( items , "AddItem", "Murks");
_ObjectCallMethod( items , "AddItem", "M rchen");
_ObjectCallMethod( items , "AddItem", "M hren");
_ObjectCallMethod( items , "AddItem", "M hle");
_ObjectCallMethod(combobox, "ExecuteTemplate", "Columns.Item(0).SortOrder = 1");
_ObjectCallMethod( combobox , "EndUpdate");
|
434
|
How can I simulate displaying groups

OBJECT columns,combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectSetProperty( combobox , "HasLines", 0);
_ObjectSetProperty( combobox , "ScrollBySingleLine", -1);
columns = _ObjectGetProperty( combobox , "Columns");
_ObjectCallMethod( columns , "Add", "Name");
_ObjectCallMethod( columns , "Add", "A");
_ObjectCallMethod( columns , "Add", "B");
_ObjectCallMethod( columns , "Add", "C");
items = _ObjectGetProperty( combobox , "Items");
h = _ObjectCallMethod( items , "AddItem", "Group 1");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellHAlignment(h,0) = 1");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ItemDivider(h) = 0");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ItemDividerLineAlignment(h) = 3");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ItemHeight(h) = 24");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.SortableItem(h) = False");
h1 = _ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h1")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h1)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(h1,1) = 1");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(h1,2) = 2");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(h1,3) = 3");
h1 = _ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(h1,1) = 4");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(h1,2) = 5");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(h1,3) = 6");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
h = _ObjectCallMethod( items , "AddItem", "Group 2");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellHAlignment(h,0) = 1");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ItemDivider(h) = 0");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ItemDividerLineAlignment(h) = 3");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ItemHeight(h) = 24");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.SortableItem(h) = False");
h1 = _ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h1")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h1)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(h1,1) = 1");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(h1,2) = 2");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(h1,3) = 3");
h1 = _ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(h1,1) = 4");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(h1,2) = 5");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(h1,3) = 6");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
|
433
|
How can I specify an item to be always the first item

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "TreeColumnIndex", -1);
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Numbers") , "SortType", 1);
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod( items , "AddItem", 1);
_ObjectCallMethod( items , "AddItem", 2);
_ObjectCallMethod( items , "AddItem", 3);
_ObjectCallMethod( items , "AddItem", 4);
h = _ObjectCallMethod( items , "AddItem", "first");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ItemPosition(h) = 0");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellHAlignment(h,0) = 2");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.SortableItem(h) = False");
_ObjectCallMethod( items , "SortChildren", 0,0,0);
_ObjectCallMethod( combobox , "EndUpdate");
|
432
|
How can I specify an item to be always the last item

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "TreeColumnIndex", -1);
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Numbers") , "SortType", 1);
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod( items , "AddItem", 1);
_ObjectCallMethod( items , "AddItem", 2);
_ObjectCallMethod( items , "AddItem", 3);
_ObjectCallMethod( items , "AddItem", 4);
h = _ObjectCallMethod( items , "AddItem", "last");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellHAlignment(h,0) = 2");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.SortableItem(h) = False");
_ObjectCallMethod( items , "SortChildren", 0,0,-1);
_ObjectCallMethod( combobox , "EndUpdate");
|
431
|
Can I allow sorting only the child items

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Childs");
items = _ObjectGetProperty( combobox , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root 1");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.SortableItem(h) = False");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
h = _ObjectCallMethod( items , "AddItem", "Root 2");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.SortableItem(h) = False");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
_ObjectCallMethod( combobox , "EndUpdate");
|
430
|
Can I specify a terminal item so it will mark the end of childs

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "ScrollBySingleLine", -1);
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "P1");
items = _ObjectGetProperty( combobox , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
h = _ObjectCallMethod( items , "InsertItem", h,"","");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ItemDivider(h) = 0");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ItemDividerLineAlignment(h) = 1");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ItemHeight(h) = 2");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.SelectableItem(h) = False");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.SortableItem(h) = False");
h = _ObjectCallMethod( items , "AddItem", "Root 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
h = _ObjectCallMethod( items , "InsertItem", h,"","");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ItemDivider(h) = 0");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ItemDividerLineAlignment(h) = 1");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ItemHeight(h) = 2");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.SelectableItem(h) = False");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.SortableItem(h) = False");
_ObjectCallMethod( combobox , "EndUpdate");
|
429
|
Is it possible to specify an item being unsortable so its position won't be changed after sorting

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "TreeColumnIndex", -1);
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Numbers") , "SortType", 1);
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod( items , "AddItem", 1);
_ObjectCallMethod( items , "AddItem", 2);
_ObjectCallMethod( items , "AddItem", 3);
_ObjectCallMethod( items , "AddItem", 4);
h = _ObjectCallMethod( items , "AddItem", "top 3");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ItemPosition(h) = 3");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellHAlignment(h,0) = 2");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.SortableItem(h) = False");
_ObjectCallMethod( items , "SortChildren", 0,0,0);
_ObjectCallMethod( combobox , "EndUpdate");
|
428
|
Can I specify an item to be a separator

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "TreeColumnIndex", -1);
_ObjectSetProperty( combobox , "SortOnClick", 0);
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Numbers");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod( items , "AddItem", 1);
_ObjectCallMethod( items , "AddItem", 2);
h = _ObjectCallMethod( items , "AddItem", "separator");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.SelectableItem(h) = False");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ItemDivider(h) = 0");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ItemDividerLineAlignment(h) = 1");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ItemDividerLine(h) = 5");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellHAlignment(h,0) = 1");
_ObjectCallMethod( items , "AddItem", 3);
_ObjectCallMethod( items , "AddItem", 4);
_ObjectCallMethod( combobox , "EndUpdate");
|
427
|
How can I collapse all items

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "LinesAtRoot", -1);
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Items");
items = _ObjectGetProperty( combobox , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
h = _ObjectCallMethod( items , "AddItem", "Root 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ExpandItem(0) = False");
_ObjectCallMethod( combobox , "EndUpdate");
|
426
|
How can I expand all items

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "LinesAtRoot", -1);
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Items");
items = _ObjectGetProperty( combobox , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
h = _ObjectCallMethod( items , "AddItem", "Root 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ExpandItem(0) = True");
_ObjectCallMethod( combobox , "EndUpdate");
|
425
|
Is it possible to specify the cell's value but still want to display some formatted text instead the value

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "MarkSearchColumn", 0);
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Value");
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "FormatCell");
items = _ObjectGetProperty( combobox , "Items");
h = _ObjectCallMethod( items , "AddItem", 1);
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(h,1) = 12");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.FormatCell(h,1) = `currency(value)`");
h = _ObjectCallMethod( items , "AddItem", "1/1/2001");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(h,1) = #1/1/2001#");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaptionFormat(h,1) = 1");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.FormatCell(h,1) = `longdate(value) replace '2001' with '<b>2001</b>'`");
_ObjectCallMethod( combobox , "EndUpdate");
|
424
|
How can I change the foreground color for a particular column

OBJECT columns,combobox;
combobox = ObjectByName("AN1") ;
columns = _ObjectGetProperty( combobox , "Columns");
_ObjectCallMethod( columns , "Add", "Column 1");
_ObjectCallMethod(combobox, "TemplatePut", "Dim colObj")
_ObjectCallMethod(combobox, "TemplatePut", columns)
_ObjectCallMethod(combobox, "ExecuteTemplate", "colObj.Add(`Column 2`).Def(8) = 8439039");
_ObjectCallMethod( columns , "Add", "Column 3");
|
423
|
How can I change the background color for a particular column

OBJECT columns,combobox;
combobox = ObjectByName("AN1") ;
columns = _ObjectGetProperty( combobox , "Columns");
_ObjectCallMethod( columns , "Add", "Column 1");
_ObjectCallMethod(combobox, "TemplatePut", "Dim colObj")
_ObjectCallMethod(combobox, "TemplatePut", columns)
_ObjectCallMethod(combobox, "ExecuteTemplate", "colObj.Add(`Column 2`).Def(7) = 8439039");
_ObjectCallMethod( columns , "Add", "Column 3");
|
422
|
How can I display the column using currency format and enlarge the font for certain values

OBJECT column,combobox,items;
combobox = ObjectByName("AN1") ;
column = _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Currency");
_ObjectCallMethod(combobox, "TemplatePut", "Dim colObj")
_ObjectCallMethod(combobox, "TemplatePut", column)
_ObjectCallMethod(combobox, "ExecuteTemplate", "colObj.Def(17) = 1");
_ObjectSetProperty( column , "FormatColumn", "len(value) ? ((0:=dbl(value)) < 10 ? '<fgcolor=808080><font ;7>' : '<b>') + currency(=:0)");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod( items , "AddItem", "1.23");
_ObjectCallMethod( items , "AddItem", "2.34");
_ObjectCallMethod( items , "AddItem", "9.94");
_ObjectCallMethod( items , "AddItem", "11.94");
_ObjectCallMethod( items , "AddItem", "1000");
|
421
|
How can I highlight only parts of the cells

OBJECT column,combobox,items;
combobox = ObjectByName("AN1") ;
column = _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "");
_ObjectCallMethod(combobox, "TemplatePut", "Dim colObj")
_ObjectCallMethod(combobox, "TemplatePut", column)
_ObjectCallMethod(combobox, "ExecuteTemplate", "colObj.Def(17) = 1");
_ObjectSetProperty( column , "FormatColumn", "value replace 'hil' with '<fgcolor=FF0000><b>hil</b></fgcolor>'");
items = _ObjectGetProperty( combobox , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child 3");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
|
420
|
How can I get the number of occurrences of a specified string in the cell

OBJECT column,combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "");
column = _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "occurrences");
_ObjectSetProperty( column , "ComputedField", "lower(%0) count 'o'");
_ObjectSetProperty( column , "FormatColumn", "'contains ' + value + ' of \'o\' chars'");
items = _ObjectGetProperty( combobox , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1 oooof the root");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child 3");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
|
419
|
How can I display dates in my format

OBJECT column,combobox,items;
combobox = ObjectByName("AN1") ;
column = _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Date");
_ObjectCallMethod(combobox, "TemplatePut", "Dim colObj")
_ObjectCallMethod(combobox, "TemplatePut", column)
_ObjectCallMethod(combobox, "ExecuteTemplate", "colObj.Def(17) = 1");
_ObjectSetProperty( column , "FormatColumn", "'<b>' + year(0:=date(value)) + '</b><fgcolor=808080><font ;6> (' + month(=:0) + ' - ' + day(=:0) +')'");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod( items , "AddItem", "1/21/2001");
_ObjectCallMethod( items , "AddItem", "2/22/2002");
_ObjectCallMethod( items , "AddItem", "3/13/2003");
_ObjectCallMethod( items , "AddItem", "4/24/2004");
|
418
|
How can I display dates in short format

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Date") , "FormatColumn", "shortdate(value)");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod( items , "AddItem", "1/1/2001");
_ObjectCallMethod( items , "AddItem", "2/2/2002");
_ObjectCallMethod( items , "AddItem", "3/3/2003");
_ObjectCallMethod( items , "AddItem", "4/4/2004");
|
417
|
How can I display dates in long format

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Date") , "FormatColumn", "longdate(value)");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod( items , "AddItem", "1/1/2001");
_ObjectCallMethod( items , "AddItem", "2/2/2002");
_ObjectCallMethod( items , "AddItem", "3/3/2003");
_ObjectCallMethod( items , "AddItem", "4/4/2004");
|
416
|
How can I display only the right part of the cell

OBJECT column,combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "");
column = _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Right");
_ObjectSetProperty( column , "ComputedField", "%0 right 2");
_ObjectSetProperty( column , "FormatColumn", "'^"' + value + '^"'");
items = _ObjectGetProperty( combobox , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod( items , "InsertItem", h,"","SChild 3");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
|
415
|
How can I display true or false instead 0 and -1

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Boolean") , "FormatColumn", "value != 0 ? 'true' : 'false'");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod( items , "AddItem", -1);
_ObjectCallMethod( items , "AddItem", 0);
_ObjectCallMethod( items , "AddItem", -1);
_ObjectCallMethod( items , "AddItem", 0);
_ObjectCallMethod( items , "AddItem", 1);
|
414
|
How can I display icons or images instead numbers

OBJECT column,combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "Images", "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq" +
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" +
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" +
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=");
column = _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Icons");
_ObjectCallMethod(combobox, "TemplatePut", "Dim colObj")
_ObjectCallMethod(combobox, "TemplatePut", column)
_ObjectCallMethod(combobox, "ExecuteTemplate", "colObj.Def(17) = 1");
_ObjectSetProperty( column , "FormatColumn", "'The cell displays the icon <img>'+value+'</img> instead ' + value");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod( items , "AddItem", 1);
_ObjectCallMethod( items , "AddItem", 2);
_ObjectCallMethod( items , "AddItem", 3);
|
413
|
How can I display the column using currency

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Currency") , "FormatColumn", "currency(dbl(value))");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod( items , "AddItem", "1.23");
_ObjectCallMethod( items , "AddItem", "2.34");
_ObjectCallMethod( items , "AddItem", "0");
_ObjectCallMethod( items , "AddItem", 5);
_ObjectCallMethod( items , "AddItem", "10000.99");
|
412
|
How can I filter programatically using more columns

OBJECT column,columns,combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "MarkSearchColumn", 0);
columns = _ObjectGetProperty( combobox , "Columns");
_ObjectCallMethod( columns , "Add", "Car");
_ObjectCallMethod( columns , "Add", "Equipment");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(AddItem(`Mazda`),1) = `Air Bag`");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(AddItem(`Toyota`),1) = `Air Bag,Air condition`");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(AddItem(`Ford`),1) = `Air condition`");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(AddItem(`Nissan`),1) = `Air Bag,ABS,ESP`");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(AddItem(`Mazda`),1) = `Air Bag, ABS,ESP`");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellCaption(AddItem(`Mazda`),1) = `ABS,ESP`");
column = _ObjectCallMethod(combobox, "ExecuteTemplate", "Columns.Item(`Car`)");
_ObjectSetProperty( column , "FilterType", 240);
_ObjectSetProperty( column , "Filter", "Mazda");
column = _ObjectCallMethod(combobox, "ExecuteTemplate", "Columns.Item(`Equipment`)");
_ObjectSetProperty( column , "FilterType", 3);
_ObjectSetProperty( column , "Filter", "*ABS*|*ESP*");
_ObjectCallMethod( combobox , "ApplyFilter");
_ObjectCallMethod( combobox , "EndUpdate");
|
411
|
I need a combobox that supports selecting multiple items, preferably with checkboxes. I can't find an example of how to do this. Does your control support it

// CellStateChanged event - Fired after cell's state has been changed.
FUNCTION comboboxEvents_CellStateChanged(OBJECT combobox, INT Cell)
_ObjectSetProperty( combobox , "LabelText", Cell);
_ObjectCallMethod(combobox, "TemplatePut", "Dim _ObObj,Cell")
_ObjectCallMethod(combobox, "TemplatePut", _ObjectGetProperty( combobox , "Items"))
_ObjectCallMethod(combobox, "TemplatePut", Cell)
Message( _ObjectCallMethod(combobox, "ExecuteTemplate", "_ObObj.CellCaption(0,Cell)") );
Message( _ObjectCallMethod(combobox, "ExecuteTemplate", "_ObObj.CellState(0,Cell)") );
END
OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
ObjectAssociateEvents("comboboxEvents", combobox);
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "Style", 2);
_ObjectSetProperty( combobox , "IntegralHeight", -1);
_ObjectSetProperty( combobox , "HeaderVisible", 0);
_ObjectSetProperty( combobox , "SingleEdit", -1);
_ObjectSetProperty( combobox , "SearchColumnIndex", -1);
_ObjectSetProperty( combobox , "AdjustSearchColumn", 0);
_ObjectCallMethod(combobox, "ExecuteTemplate", "Columns.Add(`Language`).Def(0) = True");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod( items , "AddItem", "English");
_ObjectCallMethod( items , "AddItem", "Hebrew");
_ObjectCallMethod( items , "AddItem", "Spanish");
_ObjectCallMethod( combobox , "EndUpdate");
|
410
|
How can I display a different caption in the label area, when I click the cell's check box

// CellStateChanged event - Fired after cell's state has been changed.
FUNCTION comboboxEvents_CellStateChanged(OBJECT combobox, INT Cell)
_ObjectSetProperty( combobox , "LabelText", Cell);
_ObjectCallMethod(combobox, "TemplatePut", "Dim _ObObj,Cell")
_ObjectCallMethod(combobox, "TemplatePut", _ObjectGetProperty( combobox , "Items"))
_ObjectCallMethod(combobox, "TemplatePut", Cell)
Message( _ObjectCallMethod(combobox, "ExecuteTemplate", "_ObObj.CellCaption(0,Cell)") );
Message( _ObjectCallMethod(combobox, "ExecuteTemplate", "_ObObj.CellState(0,Cell)") );
END
OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
ObjectAssociateEvents("comboboxEvents", combobox);
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "Style", 2);
_ObjectSetProperty( combobox , "IntegralHeight", -1);
_ObjectSetProperty( combobox , "HeaderVisible", 0);
_ObjectSetProperty( combobox , "SingleEdit", -1);
_ObjectSetProperty( combobox , "SearchColumnIndex", -1);
_ObjectSetProperty( combobox , "AdjustSearchColumn", 0);
_ObjectCallMethod(combobox, "ExecuteTemplate", "Columns.Add(`Language`).Def(0) = True");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod( items , "AddItem", "English");
_ObjectCallMethod( items , "AddItem", "Hebrew");
_ObjectCallMethod( items , "AddItem", "Spanish");
_ObjectSetProperty( combobox , "LabelText", " <b>custom</b> text ");
_ObjectCallMethod( combobox , "EndUpdate");
|
409
|
How can I display a different caption in the label area

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "Style", 2);
_ObjectSetProperty( combobox , "IntegralHeight", -1);
_ObjectSetProperty( combobox , "HeaderVisible", 0);
_ObjectSetProperty( combobox , "SingleEdit", -1);
_ObjectSetProperty( combobox , "SearchColumnIndex", -1);
_ObjectSetProperty( combobox , "AdjustSearchColumn", 0);
_ObjectCallMethod(combobox, "ExecuteTemplate", "Columns.Add(`Language`).Def(0) = True");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod( items , "AddItem", "English");
_ObjectCallMethod( items , "AddItem", "Hebrew");
_ObjectCallMethod( items , "AddItem", "Spanish");
_ObjectSetProperty( combobox , "LabelText", " <b>custom</b> text ");
_ObjectCallMethod( combobox , "EndUpdate");
|
408
|
How can I change the background appearance (ebn) for the filter field in the bottom part of the drop down portion

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectCallMethod( _ObjectGetProperty( combobox , "VisualAppearance") , "Add", 1,"c:\exontrol\images\normal.ebn");
_ObjectSetProperty( combobox , "FilterForVisible", -1);
_ObjectSetProperty( combobox , "FilterForBackColor", 16777216);
_ObjectSetProperty( combobox , "IntegralHeight", -1);
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Default");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod( items , "AddItem", "Item 1");
_ObjectCallMethod( items , "AddItem", "Item 2");
_ObjectCallMethod( items , "AddItem", "Item 3");
_ObjectCallMethod( items , "AddItem", "Item 4");
_ObjectCallMethod( items , "AddItem", "Item 5");
_ObjectCallMethod( combobox , "EndUpdate");
|
407
|
How can I change the background color for the filter field in the bottom part of the drop down portion

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "FilterForVisible", -1);
_ObjectSetProperty( combobox , "FilterForBackColor", 15790320);
_ObjectSetProperty( combobox , "IntegralHeight", -1);
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Default");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod( items , "AddItem", "Item 1");
_ObjectCallMethod( items , "AddItem", "Item 2");
_ObjectCallMethod( items , "AddItem", "Item 3");
_ObjectCallMethod( items , "AddItem", "Item 4");
_ObjectCallMethod( items , "AddItem", "Item 5");
_ObjectCallMethod( combobox , "EndUpdate");
|
406
|
How can I display a filter field in the bottom part of the drop down portion

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "FilterForVisible", -1);
_ObjectSetProperty( combobox , "IntegralHeight", -1);
_ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Default");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod( items , "AddItem", "Item 1");
_ObjectCallMethod( items , "AddItem", "Item 2");
_ObjectCallMethod( items , "AddItem", "Item 3");
_ObjectCallMethod( items , "AddItem", "Item 4");
_ObjectCallMethod( items , "AddItem", "Item 5");
_ObjectCallMethod( combobox , "EndUpdate");
|
405
|
Does your control support RightToLeft property for RTL languages or right to left

OBJECT column,combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
_ObjectSetProperty( combobox , "LinesAtRoot", -1);
column = _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "P1");
_ObjectCallMethod(combobox, "TemplatePut", "Dim colObj")
_ObjectCallMethod(combobox, "TemplatePut", column)
_ObjectCallMethod(combobox, "ExecuteTemplate", "colObj.Def(0) = True");
_ObjectSetProperty( column , "PartialCheck", -1);
items = _ObjectGetProperty( combobox , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
_ObjectSetProperty( combobox , "RightToLeft", -1);
_ObjectCallMethod( combobox , "EndUpdate");
|
404
|
Is there any way to display the vertical scroll bar on the left side, as I want to align my data to the right

OBJECT columns,combobox;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "BeginUpdate");
columns = _ObjectGetProperty( combobox , "Columns");
_ObjectCallMethod( columns , "Add", "C1");
_ObjectCallMethod( columns , "Add", "C2");
_ObjectCallMethod( columns , "Add", "C3");
_ObjectCallMethod( columns , "Add", "C4");
_ObjectCallMethod( columns , "Add", "C5");
_ObjectCallMethod( columns , "Add", "C6");
_ObjectCallMethod( columns , "Add", "C7");
_ObjectCallMethod( columns , "Add", "C8");
_ObjectSetProperty( combobox , "RightToLeft", -1);
_ObjectCallMethod( combobox , "EndUpdate");
|
403
|
Can I display the cell's check box after the text

OBJECT column,combobox,items;
combobox = ObjectByName("AN1") ;
column = _ObjectCallMethod( _ObjectGetProperty( combobox , "Columns") , "Add", "Column");
_ObjectCallMethod(combobox, "TemplatePut", "Dim colObj")
_ObjectCallMethod(combobox, "TemplatePut", column)
_ObjectCallMethod(combobox, "ExecuteTemplate", "colObj.Def(0) = True");
_ObjectCallMethod(combobox, "ExecuteTemplate", "colObj.Def(34) = `caption,check`");
items = _ObjectGetProperty( combobox , "Items");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellHasCheckBox(AddItem(`Caption 1`),0) = True");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellHasCheckBox(AddItem(`Caption 2`),0) = True");
|
402
|
Can I change the order of the parts in the cell, as checkbox after the text, and so on

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "Images", "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq" +
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" +
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" +
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=");
_ObjectCallMethod(combobox, "ExecuteTemplate", "Columns.Add(`Column`).Def(34) = `caption,check,icon,icons,picture`");
items = _ObjectGetProperty( combobox , "Items");
h = _ObjectCallMethod( items , "AddItem", "Text");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellImage(h,0) = 1");
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellHasCheckBox(h,0) = True");
|
401
|
Can I have an image displayed after the text. Can I get that effect without using HTML content

OBJECT combobox,items;
combobox = ObjectByName("AN1") ;
_ObjectCallMethod( combobox , "Images", "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq" +
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" +
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" +
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=");
_ObjectCallMethod(combobox, "ExecuteTemplate", "Columns.Add(`Column`).Def(34) = `caption,icon,check,icons,picture`");
items = _ObjectGetProperty( combobox , "Items");
h = _ObjectCallMethod( items , "AddItem", "Text");
_ObjectCallMethod(combobox, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(combobox, "TemplatePut", items)
_ObjectCallMethod(combobox, "TemplatePut", h)
_ObjectCallMethod(combobox, "ExecuteTemplate", "iteObj.CellImage(h,0) = 1");
|